home *** CD-ROM | disk | FTP | other *** search
/ Aminet 48 / Aminet 48 (2002)(GTI - Schatztruhe)[!][Apr 2002].iso / Aminet / text / edit / vim60rt.lha / Vim / vim60 / syntax / msql.vim < prev    next >
Encoding:
Text File  |  2001-05-11  |  2.7 KB  |  101 lines
  1. " Vim syntax file
  2. " Language:    msql
  3. " Maintainer:    Lutz Eymers <ixtab@polzin.com>
  4. " URL:        http://www.isp.de/data/msql.vim
  5. " Email:    Subject: send syntax_vim.tgz
  6. " Last Change:    2001 May 10
  7. "
  8. " Options    msql_sql_query = 1 for SQL syntax highligthing inside strings
  9. "        msql_minlines = x     to sync at least x lines backwards
  10.  
  11. " For version 5.x: Clear all syntax items
  12. " For version 6.x: Quit when a syntax file was already loaded
  13. if version < 600
  14.   syntax clear
  15. elseif exists("b:current_syntax")
  16.   finish
  17. endif
  18.  
  19. if !exists("main_syntax")
  20.   let main_syntax = 'msql'
  21. endif
  22.  
  23. if version < 600
  24.   so <sfile>:p:h/html.vim
  25. else
  26.   runtime! syntax/html.vim
  27.   unlet b:current_syntax
  28. endif
  29.  
  30. syn cluster htmlPreproc add=msqlRegion
  31.  
  32. syn case match
  33.  
  34. " Internal Variables
  35. syn keyword msqlIntVar ERRMSG contained
  36.  
  37. " Env Variables
  38. syn keyword msqlEnvVar SERVER_SOFTWARE SERVER_NAME SERVER_URL GATEWAY_INTERFACE contained
  39. syn keyword msqlEnvVar SERVER_PROTOCOL SERVER_PORT REQUEST_METHOD PATH_INFO  contained
  40. syn keyword msqlEnvVar PATH_TRANSLATED SCRIPT_NAME QUERY_STRING REMOTE_HOST contained
  41. syn keyword msqlEnvVar REMOTE_ADDR AUTH_TYPE REMOTE_USER CONTEN_TYPE  contained
  42. syn keyword msqlEnvVar CONTENT_LENGTH HTTPS HTTPS_KEYSIZE HTTPS_SECRETKEYSIZE  contained
  43. syn keyword msqlEnvVar HTTP_ACCECT HTTP_USER_AGENT HTTP_IF_MODIFIED_SINCE  contained
  44. syn keyword msqlEnvVar HTTP_FROM HTTP_REFERER contained
  45.  
  46. " Inlclude lLite
  47. syn include @msqlLite <sfile>:p:h/lite.vim
  48.  
  49. " Msql Region
  50. syn region msqlRegion matchgroup=Delimiter start="<!$" start="<![^!->D]" end=">" contains=@msqlLite,msql.*
  51.  
  52. " sync
  53. if exists("msql_minlines")
  54.   exec "syn sync minlines=" . msql_minlines
  55. else
  56.   syn sync minlines=100
  57. endif
  58.  
  59. " Define the default highlighting.
  60. " For version 5.7 and earlier: only when not done already
  61. " For version 5.8 and later: only when an item doesn't have highlighting yet
  62. if version >= 508 || !exists("did_msql_syn_inits")
  63.   if version < 508
  64.     let did_msql_syn_inits = 1
  65.     command -nargs=+ HiLink hi link <args>
  66.   else
  67.     command -nargs=+ HiLink hi def link <args>
  68.   endif
  69.  
  70.   HiLink msqlComment        Comment
  71.   HiLink msqlString        String
  72.   HiLink msqlNumber        Number
  73.   HiLink msqlFloat        Float
  74.   HiLink msqlIdentifier    Identifier
  75.   HiLink msqlGlobalIdentifier    Identifier
  76.   HiLink msqlIntVar        Identifier
  77.   HiLink msqlEnvVar        Identifier
  78.   HiLink msqlFunctions        Function
  79.   HiLink msqlRepeat        Repeat
  80.   HiLink msqlConditional    Conditional
  81.   HiLink msqlStatement        Statement
  82.   HiLink msqlType        Type
  83.   HiLink msqlInclude        Include
  84.   HiLink msqlDefine        Define
  85.   HiLink msqlSpecialChar    SpecialChar
  86.   HiLink msqlParentError    Error
  87.   HiLink msqlTodo        Todo
  88.   HiLink msqlOperator        Operator
  89.   HiLink msqlRelation        Operator
  90.  
  91.   delcommand HiLink
  92. endif
  93.  
  94. let b:current_syntax = "msql"
  95.  
  96. if main_syntax == 'msql'
  97.   unlet main_syntax
  98. endif
  99.  
  100. " vim: ts=8
  101.